(snake-score-file): Put in home dir, not in /tmp.

diff --git a/lisp/play/snake.el b/lisp/play/snake.el
index 2367705a68f5a6ce336de34232986d2863f204a0..d99d342906b0f8b9abf52dbbc8e0a5c4cad10673 100644 (file)
--- a/lisp/play/snake.el
+++ b/lisp/play/snake.el
@@ -82,7 +82,10 @@
 (defvar snake-score-y snake-height
   "Y position of score.")
 
-(defvar snake-score-file (concat temporary-file-directory "snake-scores")
+;; It is not safe to put this in /tmp.
+;; Someone could make a symlink in /tmp 
+;; pointing to a file you don't want to clobber.
+(defvar snake-score-file "~/.snake-scores")
   "File for holding high scores.")
 
 ;; ;;;;;;;;;;;;; display options ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;